home *** CD-ROM | disk | FTP | other *** search
/ Power Bytes: Money & Finance / PowerBytes Money and Finance CD-ROM 01 / PowerBytes Money and Finance CD-ROM 01.iso / New Stuffed Files / MacMoney Demo 2.sit / MacMoney Demo Stack / background_5647.txt < prev    next >
Encoding:
Text File  |  1988-08-02  |  17.5 KB  |  704 lines

  1. -- background: 5647 from stack: in
  2. -- bmap block id: 11105
  3. -- flags: 0000
  4. -- background id: 0
  5. -- name: 
  6. ----- HyperTalk script -----
  7. on openCard
  8.   set lockScreen to true
  9.   multiply bkgnd field "whole" by 0
  10.   multiply bkgnd field "trade" by 0
  11.   multiply bkgnd field "sub" by 0
  12.   multiply bkgnd field "tax" by 0
  13.   multiply bkgnd field "total" by 0
  14.   multiply bkgnd field "ship" by 0
  15.   set hilite of bkgnd button id 9 to false
  16.   set hilite of bkgnd button id 10 to false
  17.   set hilite of bkgnd button id 43 to false
  18.   set hilite of bkgnd button id 18 to false
  19.   set hilite of bkgnd button id 19 to false
  20.   set hilite of bkgnd button id 37 to false
  21.   set hilite of bkgnd button id 40 to false
  22.   set hilite of bkgnd button id 41 to false
  23.   set hilite of bkgnd button id 11 to false
  24.   delete line one of bkgnd field "name"
  25.   delete line one of bkgnd field "address"
  26.   delete line one of bkgnd field "city"
  27.   delete line one of bkgnd field "state"
  28.   delete line one of bkgnd field "zip"
  29.   delete line one of bkgnd field "area code"
  30.   delete line one of bkgnd field "phone"
  31.   delete line one of bkgnd field "check"
  32.   delete line one of bkgnd field "No."
  33.   delete line one of bkgnd field "exp date"
  34.   set lockScreen to false
  35. end openCard
  36.  
  37.  
  38. -- part 2 (field)
  39. -- low flags: 00
  40. -- high flags: 4000
  41. -- rect: left=46 top=71 right=89 bottom=362
  42. -- title width / last selected line: 0
  43. -- icon id / first selected line: 0 / 0
  44. -- text alignment: 0
  45. -- font id: 3
  46. -- text size: 12
  47. -- style flags: 0
  48. -- line height: 16
  49. -- part name: name
  50.  
  51.  
  52. -- part 3 (field)
  53. -- low flags: 00
  54. -- high flags: 4000
  55. -- rect: left=60 top=88 right=106 bottom=362
  56. -- title width / last selected line: 0
  57. -- icon id / first selected line: 0 / 0
  58. -- text alignment: 0
  59. -- font id: 3
  60. -- text size: 12
  61. -- style flags: 0
  62. -- line height: 16
  63. -- part name: address
  64.  
  65.  
  66. -- part 4 (field)
  67. -- low flags: 00
  68. -- high flags: 4000
  69. -- rect: left=35 top=105 right=122 bottom=191
  70. -- title width / last selected line: 0
  71. -- icon id / first selected line: 0 / 0
  72. -- text alignment: 0
  73. -- font id: 3
  74. -- text size: 12
  75. -- style flags: 0
  76. -- line height: 16
  77. -- part name: city
  78.  
  79.  
  80. -- part 5 (field)
  81. -- low flags: 00
  82. -- high flags: 4000
  83. -- rect: left=234 top=105 right=122 bottom=290
  84. -- title width / last selected line: 0
  85. -- icon id / first selected line: 0 / 0
  86. -- text alignment: 0
  87. -- font id: 3
  88. -- text size: 12
  89. -- style flags: 0
  90. -- line height: 16
  91. -- part name: state
  92.  
  93.  
  94. -- part 6 (field)
  95. -- low flags: 00
  96. -- high flags: 4000
  97. -- rect: left=28 top=121 right=138 bottom=120
  98. -- title width / last selected line: 0
  99. -- icon id / first selected line: 0 / 0
  100. -- text alignment: 0
  101. -- font id: 3
  102. -- text size: 12
  103. -- style flags: 0
  104. -- line height: 16
  105. -- part name: zip
  106.  
  107.  
  108. -- part 7 (field)
  109. -- low flags: 00
  110. -- high flags: 4000
  111. -- rect: left=172 top=121 right=137 bottom=205
  112. -- title width / last selected line: 0
  113. -- icon id / first selected line: 0 / 0
  114. -- text alignment: 0
  115. -- font id: 3
  116. -- text size: 12
  117. -- style flags: 0
  118. -- line height: 16
  119. -- part name: area code
  120.  
  121.  
  122. -- part 8 (field)
  123. -- low flags: 00
  124. -- high flags: 4000
  125. -- rect: left=210 top=121 right=138 bottom=290
  126. -- title width / last selected line: 0
  127. -- icon id / first selected line: 0 / 0
  128. -- text alignment: 0
  129. -- font id: 3
  130. -- text size: 12
  131. -- style flags: 0
  132. -- line height: 16
  133. -- part name: phone
  134.  
  135.  
  136. -- part 9 (button)
  137. -- low flags: 00
  138. -- high flags: 8005
  139. -- rect: left=1 top=168 right=189 bottom=137
  140. -- title width / last selected line: 0
  141. -- icon id / first selected line: 0 / 0
  142. -- text alignment: 1
  143. -- font id: 0
  144. -- text size: 12
  145. -- style flags: 0
  146. -- line height: 16
  147. -- part name: Check enclosed #
  148. ----- HyperTalk script -----
  149. on mouseUp
  150.   set hilite of bkgnd button "check enclosed #" to true
  151.   set hilite of bkgnd button "MasterCard" to false
  152.   set hilite of bkgnd button "Visa" to false
  153.   click at loc of bkgnd field "check"
  154. end mouseUp
  155.  
  156.  
  157.  
  158. -- part 10 (button)
  159. -- low flags: 00
  160. -- high flags: 8005
  161. -- rect: left=1 top=188 right=208 bottom=108
  162. -- title width / last selected line: 0
  163. -- icon id / first selected line: 0 / 0
  164. -- text alignment: 1
  165. -- font id: 0
  166. -- text size: 12
  167. -- style flags: 0
  168. -- line height: 16
  169. -- part name: MasterCard
  170. ----- HyperTalk script -----
  171. on mouseUp
  172.   set hilite of bkgnd button "MasterCard" to true
  173.   set hilite of bkgnd button "check enclosed #" to false
  174.   set hilite of bkgnd button "Visa" to false
  175.   click at loc of bkgnd field "No."
  176. end mouseUp
  177.  
  178.  
  179.  
  180. -- part 11 (button)
  181. -- low flags: 00
  182. -- high flags: A005
  183. -- rect: left=129 top=188 right=208 bottom=236
  184. -- title width / last selected line: 0
  185. -- icon id / first selected line: 0 / 0
  186. -- text alignment: 1
  187. -- font id: 0
  188. -- text size: 12
  189. -- style flags: 0
  190. -- line height: 16
  191. -- part name: Visa
  192. ----- HyperTalk script -----
  193. on mouseUp
  194.   set hilite of bkgnd button "Visa" to true
  195.   set hilite of bkgnd button "check enclosed #" to false
  196.   set hilite of bkgnd button "MasterCard" to false
  197.   click at loc of bkgnd field "No."
  198. end mouseUp
  199.  
  200.  
  201.  
  202. -- part 12 (field)
  203. -- low flags: 00
  204. -- high flags: 4000
  205. -- rect: left=134 top=168 right=185 bottom=272
  206. -- title width / last selected line: 0
  207. -- icon id / first selected line: 0 / 0
  208. -- text alignment: 0
  209. -- font id: 3
  210. -- text size: 12
  211. -- style flags: 0
  212. -- line height: 16
  213. -- part name: Check
  214.  
  215.  
  216. -- part 13 (field)
  217. -- low flags: 00
  218. -- high flags: 4000
  219. -- rect: left=28 top=206 right=223 bottom=285
  220. -- title width / last selected line: 0
  221. -- icon id / first selected line: 0 / 0
  222. -- text alignment: 0
  223. -- font id: 3
  224. -- text size: 12
  225. -- style flags: 0
  226. -- line height: 16
  227. -- part name: No.
  228.  
  229.  
  230. -- part 14 (field)
  231. -- low flags: 00
  232. -- high flags: 4000
  233. -- rect: left=68 top=222 right=240 bottom=285
  234. -- title width / last selected line: 0
  235. -- icon id / first selected line: 0 / 0
  236. -- text alignment: 0
  237. -- font id: 3
  238. -- text size: 12
  239. -- style flags: 0
  240. -- line height: 16
  241. -- part name: exp date
  242.  
  243.  
  244. -- part 18 (button)
  245. -- low flags: 00
  246. -- high flags: A005
  247. -- rect: left=67 top=282 right=303 bottom=253
  248. -- title width / last selected line: 0
  249. -- icon id / first selected line: 0 / 0
  250. -- text alignment: 1
  251. -- font id: 0
  252. -- text size: 12
  253. -- style flags: 0
  254. -- line height: 16
  255. -- part name: MacMoney Pkg ($119.95)
  256. ----- HyperTalk script -----
  257. on mouseUp
  258.   click at loc of bkgnd field "whole"
  259.   click at loc of bkgnd field "whole"
  260.  
  261. end mouseUp
  262.  
  263.  
  264.  
  265. -- part 19 (button)
  266. -- low flags: 00
  267. -- high flags: A005
  268. -- rect: left=67 top=302 right=323 bottom=253
  269. -- title width / last selected line: 0
  270. -- icon id / first selected line: 0 / 0
  271. -- text alignment: 1
  272. -- font id: 0
  273. -- text size: 12
  274. -- style flags: 0
  275. -- line height: 16
  276. -- part name: Trade-in Pkg ($35.00)*
  277. ----- HyperTalk script -----
  278. on mouseUp
  279.   click at loc of bkgnd field "trade"
  280.   click at loc of bkgnd field "trade"
  281. end mouseUp
  282.  
  283.  
  284.  
  285. -- part 21 (field)
  286. -- low flags: 00
  287. -- high flags: 0002
  288. -- rect: left=2 top=283 right=301 bottom=39
  289. -- title width / last selected line: 0
  290. -- icon id / first selected line: 0 / 0
  291. -- text alignment: 0
  292. -- font id: 0
  293. -- text size: 12
  294. -- style flags: 0
  295. -- line height: 16
  296. -- part name: Whole
  297.  
  298.  
  299. -- part 22 (field)
  300. -- low flags: 00
  301. -- high flags: 0002
  302. -- rect: left=2 top=301 right=319 bottom=39
  303. -- title width / last selected line: 0
  304. -- icon id / first selected line: 0 / 0
  305. -- text alignment: 0
  306. -- font id: 0
  307. -- text size: 12
  308. -- style flags: 0
  309. -- line height: 16
  310. -- part name: Trade
  311.  
  312.  
  313. -- part 24 (button)
  314. -- low flags: 00
  315. -- high flags: 8004
  316. -- rect: left=350 top=286 right=308 bottom=450
  317. -- title width / last selected line: 0
  318. -- icon id / first selected line: 0 / 0
  319. -- text alignment: 1
  320. -- font id: 0
  321. -- text size: 12
  322. -- style flags: 0
  323. -- line height: 16
  324. -- part name: Print Form
  325. ----- HyperTalk script -----
  326. on mouseUp
  327.   hide menuBar
  328.   hide message box
  329.   hide bkgnd button "cancel"
  330.   hide bkgnd button "home"
  331.   hide bkgnd button "main Menu"
  332.   hide bkgnd button "print form"
  333.   hide bkgnd field "order"
  334.  
  335.   doMenu print card
  336.   show bkgnd button "print form"
  337.   show bkgnd button "home"
  338.   show bkgnd button "main Menu"
  339.   show bkgnd button "cancel"
  340.   show bkgnd field "order"
  341. end mouseUp
  342.  
  343.  
  344.  
  345. -- part 25 (button)
  346. -- low flags: 00
  347. -- high flags: 8004
  348. -- rect: left=374 top=28 right=50 bottom=474
  349. -- title width / last selected line: 0
  350. -- icon id / first selected line: 0 / 0
  351. -- text alignment: 1
  352. -- font id: 0
  353. -- text size: 12
  354. -- style flags: 0
  355. -- line height: 16
  356. -- part name: Cancel
  357. ----- HyperTalk script -----
  358. on mouseUp
  359.   set lockScreen to true
  360.   multiply bkgnd field "whole" by 0
  361.   multiply bkgnd field "trade" by 0
  362.   multiply bkgnd field "sub" by 0
  363.   multiply bkgnd field "tax" by 0
  364.   multiply bkgnd field "total" by 0
  365.   multiply bkgnd field "ship" by 0
  366.   set hilite of bkgnd button id 9 to false
  367.   set hilite of bkgnd button id 10 to false
  368.   set hilite of bkgnd button id 43 to false
  369.   set hilite of bkgnd button id 18 to false
  370.   set hilite of bkgnd button id 19 to false
  371.   set hilite of bkgnd button id 37 to false
  372.   set hilite of bkgnd button id 40 to false
  373.   set hilite of bkgnd button id 41 to false
  374.   set hilite of bkgnd button id 11 to false
  375.   delete line one of bkgnd field "name"
  376.   delete line one of bkgnd field "address"
  377.   delete line one of bkgnd field "city"
  378.   delete line one of bkgnd field "state"
  379.   delete line one of bkgnd field "zip"
  380.   delete line one of bkgnd field "area code"
  381.   delete line one of bkgnd field "phone"
  382.   delete line one of bkgnd field "check"
  383.   delete line one of bkgnd field "No."
  384.   delete line one of bkgnd field "exp date"
  385.   set lockScreen to false
  386.   Visual effect iris close slowly
  387.   pop card
  388.  
  389. end mouseUp
  390.  
  391.  
  392.  
  393. -- part 26 (button)
  394. -- low flags: 00
  395. -- high flags: 8004
  396. -- rect: left=374 top=52 right=74 bottom=474
  397. -- title width / last selected line: 0
  398. -- icon id / first selected line: 0 / 0
  399. -- text alignment: 1
  400. -- font id: 0
  401. -- text size: 12
  402. -- style flags: 0
  403. -- line height: 16
  404. -- part name: Home
  405. ----- HyperTalk script -----
  406. on mouseUp
  407.   set lockScreen to true
  408.   multiply bkgnd field "whole" by 0
  409.   multiply bkgnd field "trade" by 0
  410.   multiply bkgnd field "sub" by 0
  411.   multiply bkgnd field "tax" by 0
  412.   multiply bkgnd field "total" by 0
  413.   multiply bkgnd field "ship" by 0
  414.   set hilite of bkgnd button id 9 to false
  415.   set hilite of bkgnd button id 10 to false
  416.   set hilite of bkgnd button id 43 to false
  417.   set hilite of bkgnd button id 18 to false
  418.   set hilite of bkgnd button id 19 to false
  419.   set hilite of bkgnd button id 37 to false
  420.   set hilite of bkgnd button id 40 to false
  421.   set hilite of bkgnd button id 41 to false
  422.   set hilite of bkgnd button id 11 to false
  423.   delete line one of bkgnd field "name"
  424.   delete line one of bkgnd field "address"
  425.   delete line one of bkgnd field "city"
  426.   delete line one of bkgnd field "state"
  427.   delete line one of bkgnd field "zip"
  428.   delete line one of bkgnd field "area code"
  429.   delete line one of bkgnd field "phone"
  430.   delete line one of bkgnd field "check"
  431.   delete line one of bkgnd field "No."
  432.   delete line one of bkgnd field "exp date"
  433.   set lockScreen to false
  434.   Visual effect iris close slowly
  435.   go home
  436. end mouseUp
  437.  
  438.  
  439.  
  440. -- part 29 (button)
  441. -- low flags: 00
  442. -- high flags: 8004
  443. -- rect: left=374 top=76 right=98 bottom=474
  444. -- title width / last selected line: 0
  445. -- icon id / first selected line: 0 / 0
  446. -- text alignment: 1
  447. -- font id: 0
  448. -- text size: 12
  449. -- style flags: 0
  450. -- line height: 16
  451. -- part name: Main Menu
  452. ----- HyperTalk script -----
  453. on mouseUp
  454.   set lockScreen to true
  455.   multiply bkgnd field "whole" by 0
  456.   multiply bkgnd field "trade" by 0
  457.   multiply bkgnd field "sub" by 0
  458.   multiply bkgnd field "tax" by 0
  459.   multiply bkgnd field "total" by 0
  460.   multiply bkgnd field "ship" by 0
  461.   set hilite of bkgnd button id 9 to false
  462.   set hilite of bkgnd button id 10 to false
  463.   set hilite of bkgnd button id 43 to false
  464.   set hilite of bkgnd button id 18 to false
  465.   set hilite of bkgnd button id 19 to false
  466.   set hilite of bkgnd button id 37 to false
  467.   set hilite of bkgnd button id 40 to false
  468.   set hilite of bkgnd button id 41 to false
  469.   set hilite of bkgnd button id 11 to false
  470.   delete line one of bkgnd field "name"
  471.   delete line one of bkgnd field "address"
  472.   delete line one of bkgnd field "city"
  473.   delete line one of bkgnd field "state"
  474.   delete line one of bkgnd field "zip"
  475.   delete line one of bkgnd field "area code"
  476.   delete line one of bkgnd field "phone"
  477.   delete line one of bkgnd field "check"
  478.   delete line one of bkgnd field "No."
  479.   delete line one of bkgnd field "exp date"
  480.   set lockScreen to false
  481.   Visual effect iris close slowly
  482.   go to card "Main Menu"
  483. end mouseUp
  484.  
  485.  
  486.  
  487. -- part 30 (field)
  488. -- low flags: 01
  489. -- high flags: 4000
  490. -- rect: left=432 top=146 right=163 bottom=493
  491. -- title width / last selected line: 0
  492. -- icon id / first selected line: 0 / 0
  493. -- text alignment: 0
  494. -- font id: 0
  495. -- text size: 12
  496. -- style flags: 0
  497. -- line height: 16
  498. -- part name: Sub
  499.  
  500.  
  501. -- part 31 (field)
  502. -- low flags: 01
  503. -- high flags: 4000
  504. -- rect: left=432 top=173 right=190 bottom=493
  505. -- title width / last selected line: 0
  506. -- icon id / first selected line: 0 / 0
  507. -- text alignment: 0
  508. -- font id: 0
  509. -- text size: 12
  510. -- style flags: 0
  511. -- line height: 16
  512. -- part name: Tax
  513.  
  514.  
  515. -- part 33 (field)
  516. -- low flags: 01
  517. -- high flags: 4000
  518. -- rect: left=433 top=236 right=253 bottom=492
  519. -- title width / last selected line: 0
  520. -- icon id / first selected line: 0 / 0
  521. -- text alignment: 0
  522. -- font id: 0
  523. -- text size: 12
  524. -- style flags: 0
  525. -- line height: 16
  526. -- part name: Total
  527.  
  528.  
  529. -- part 37 (button)
  530. -- low flags: 00
  531. -- high flags: A006
  532. -- rect: left=299 top=145 right=167 bottom=399
  533. -- title width / last selected line: 0
  534. -- icon id / first selected line: 0 / 0
  535. -- text alignment: 1
  536. -- font id: 0
  537. -- text size: 12
  538. -- style flags: 0
  539. -- line height: 16
  540. -- part name: Subtotal
  541. ----- HyperTalk script -----
  542. on mouseUp
  543.   if bkgnd field "Whole">0 then put 1 into it
  544.   set hilite of bkgnd button "subtotal" to true
  545.   set hilite of bkgnd button "6.5% tax" to false
  546.   set hilite of bkgnd button "ship. / hand." to false
  547.   set hilite of bkgnd button "total" to false
  548.  
  549.   set numberFormat to "000.00"
  550.  
  551.   put bkgnd field "whole" into hwhole
  552.   put 119.95*hwhole into bkgnd field "sub"
  553.   put bkgnd field "trade" into htrade
  554.   put 35.00*htrade into newsub
  555.   add newsub to bkgnd field "sub"
  556.  
  557.   put 000.00 into bkgnd field "tax"
  558.   put 000.00 into bkgnd field "total"
  559.   put 000.00 into bkgnd field "ship"
  560.  
  561.   if bkgnd field "sub"<= 000.00 then set hilite of bkgnd button "subtotal" to false
  562. end mouseUp
  563.  
  564.  
  565.  
  566. -- part 40 (button)
  567. -- low flags: 00
  568. -- high flags: A006
  569. -- rect: left=299 top=171 right=193 bottom=376
  570. -- title width / last selected line: 0
  571. -- icon id / first selected line: 0 / 0
  572. -- text alignment: 1
  573. -- font id: 0
  574. -- text size: 12
  575. -- style flags: 0
  576. -- line height: 16
  577. -- part name: 6.5% Tax
  578. ----- HyperTalk script -----
  579. on mouseUp
  580.   set hilite of bkgnd button "6.5% Tax" to true
  581.   set hilite of bkgnd button "ship. / hand." to false
  582.   set hilite of bkgnd button "total" to false
  583.  
  584.   set numberFormat to "000.00"
  585.  
  586.   put 000.00 into bkgnd field "ship"
  587.   put 000.00 into bkgnd field "total"
  588.  
  589.   put bkgnd field "sub" into tax
  590.   if bkgnd field "whole">= 1 then put .065*tax into bkgnd field "Tax"
  591.   else put 000.00 into bkgnd field "Tax"
  592.   if bkgnd field "trade">= 1 then put .065*tax into bkgnd field "Tax"
  593.   else put 000.00 into bkgnd field "Tax"
  594.   if bkgnd field "whole">= 1 then put .065*tax into bkgnd field "Tax"
  595.  
  596.   if bkgnd field "tax"<= 000.00 then set hilite of bkgnd button "6.5% tax" to false
  597. end mouseUp
  598.  
  599.  
  600. put .065*tax into bkgnd field "Tax"
  601.  
  602.  
  603.  
  604. -- part 41 (button)
  605. -- low flags: 00
  606. -- high flags: A006
  607. -- rect: left=299 top=237 right=259 bottom=399
  608. -- title width / last selected line: 0
  609. -- icon id / first selected line: 0 / 0
  610. -- text alignment: 1
  611. -- font id: 0
  612. -- text size: 12
  613. -- style flags: 0
  614. -- line height: 16
  615. -- part name: Total
  616. ----- HyperTalk script -----
  617. on mouseUp
  618.   set numberFormat to "000.00"
  619.   set hilite of bkgnd button "total" to true
  620.   put 00.00 into totalh
  621.   add bkgnd field "sub" to totalh
  622.   add bkgnd field "tax" to totalh
  623.   add bkgnd field "ship" to totalh
  624.   put totalh into bkgnd field "total"
  625.   if bkgnd field "whole">= 1 then put totalh into bkgnd field "total"
  626.   else put 000.00 into bkgnd field "total"
  627.   if bkgnd field "trade">= 1 then put totalh into bkgnd field "total"
  628.   else put 000.00 into bkgnd field "total"
  629.   if bkgnd field "whole">= 1 then put totalh into bkgnd field "total"
  630.  
  631.  
  632.   if bkgnd field "total"<= 000.00 then set hilite of bkgnd button "total" to false
  633.   if bkgnd field "ship"<= 000.00 then set hilite of bkgnd button "ship. / hand." to false
  634.   if bkgnd field "tax"<= 000.00 then set hilite of bkgnd button "6.5% tax" to false
  635.  
  636.  
  637. end mouseUp
  638.  
  639. put totalh into bkgnd field "total"
  640.  
  641.  
  642. -- part 43 (button)
  643. -- low flags: 00
  644. -- high flags: A006
  645. -- rect: left=299 top=211 right=233 bottom=402
  646. -- title width / last selected line: 0
  647. -- icon id / first selected line: 0 / 0
  648. -- text alignment: 1
  649. -- font id: 0
  650. -- text size: 12
  651. -- style flags: 0
  652. -- line height: 16
  653. -- part name: Ship. / Hand.
  654. ----- HyperTalk script -----
  655. on mouseUp
  656.   set hilite of bkgnd button "ship. / Hand." to true
  657.   set hilite of bkgnd button "total" to false
  658.   set numberFormat to "000.00"
  659.  
  660.   if bkgnd field "whole">= 1 then put 003.00 into bkgnd field "ship"
  661.   else put 000.00 into bkgnd field "ship"
  662.  
  663.   if bkgnd field "trade">= 1 then put 003.00 into bkgnd field "ship"
  664.   else put 000.00 into bkgnd field "ship"
  665.  
  666.   if bkgnd field "whole">= 1 then put 003.00 into bkgnd field "ship"
  667.  
  668.   put 000.00 into bkgnd field "total"
  669.  
  670.   if bkgnd field "ship"<= 000.00 then set hilite of bkgnd button "ship. / hand." to false
  671.  
  672. end mouseUp
  673.  
  674.  
  675.  
  676.  
  677.  
  678. -- part 44 (field)
  679. -- low flags: 01
  680. -- high flags: 4000
  681. -- rect: left=433 top=209 right=226 bottom=494
  682. -- title width / last selected line: 0
  683. -- icon id / first selected line: 0 / 0
  684. -- text alignment: 0
  685. -- font id: 0
  686. -- text size: 12
  687. -- style flags: 0
  688. -- line height: 16
  689. -- part name: ship
  690.  
  691.  
  692. -- part 45 (field)
  693. -- low flags: 01
  694. -- high flags: 0000
  695. -- rect: left=305 top=115 right=134 bottom=502
  696. -- title width / last selected line: 0
  697. -- icon id / first selected line: 0 / 0
  698. -- text alignment: 0
  699. -- font id: 3
  700. -- text size: 10
  701. -- style flags: 0
  702. -- line height: 13
  703. -- part name: order
  704.